论坛精华
>> SQL之家
>> SQL语句中的删除和改变 [查看别人的评论]
由 amtd 发布于: 2001-02-15 09:33
with Tquery.Create(self) do
begin
SQL.Add('update xhs set Status=1');
SQL.Add('where id='+Query2.FieldByName('ID').AsString);
ExecSQL;
Free;
end;
with Tquery.Create(self) do
begin
SQL.Add('delete from xhs where');
SQL.Add('id='+Query2.FieldByName('ID').AsString);
ExecSQL;
Free;
end;
from http://www.aotong.com/anbin/idea/ideashow.asp?ID=90&sort=delphi
__________________
真实源于生活!
请访问我们的网站:
(VB爱好者乐园)
http://www.vbgood.com
http://www.d1vb.com
http://61.128.97.225/vbgood/index.asp
拥有1800多个资料!
|